home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2002 May
/
chip-cd_2002_05.zip
/
05
/
Dom i biuro
/
Mr Faktury Pro 1.53
/
Instaluj.exe
/
0
/
RCDATA
/
TPATHSELFORM
/
TPATHSELFORM.txt
< prev
Wrap
Text File
|
2002-02-28
|
4KB
|
172 lines
object PathSelForm: TPathSelForm
Left = 350
Top = 235
BorderStyle = bsDialog
Caption = 'PathSelForm'
ClientHeight = 294
ClientWidth = 352
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object UpButton: TSpeedButton
Left = 8
Top = 13
Width = 25
Height = 25
Hint = 'Up One Level'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777700000000000000000FBFBFBFBFBFBFB00BFBFBFBFBFB
FBF00FBFB0000000BFB00BFBF0FBFBFBFBF00FBFB0BFBFBFBFB00BF00000FBFB
FBF00FBF000FBFBFBFB00BFBF0FBFBFBFBF00FBFBFBFBFBFBFB0000000000000
000770BFBFB07777777778000008777777777777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = UpButtonClick
end
object Label2: TLabel
Left = 8
Top = 40
Width = 46
Height = 13
Caption = 'Kartoteka'
end
object Label3: TLabel
Left = 214
Top = 40
Width = 21
Height = 13
Caption = 'Files'
end
object Label4: TLabel
Left = 56
Top = 0
Width = 24
Height = 13
Caption = 'Dysk'
end
object Label1: TLabel
Left = 8
Top = 216
Width = 80
Height = 13
Caption = 'Wybrany katalog'
end
object DriveComboBox1: TDriveComboBox
Left = 56
Top = 16
Width = 281
Height = 19
Hint = 'Select Drive'
DirList = DirectoryListBox1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
TextCase = tcUpperCase
end
object OKbutton: TBitBtn
Left = 8
Top = 264
Width = 75
Height = 25
Hint = 'Accept Selection'
ParentShowHint = False
ShowHint = True
TabOrder = 1
Kind = bkOK
end
object CancelButton: TBitBtn
Left = 256
Top = 264
Width = 81
Height = 25
Hint = 'Reject Selection'
Caption = '&Rezygnuj'
ParentShowHint = False
ShowHint = True
TabOrder = 2
Kind = bkCancel
end
object Panel1: TPanel
Left = 8
Top = 56
Width = 329
Height = 153
BevelInner = bvLowered
Caption = 'Panel1'
TabOrder = 3
object Splitter1: TSplitter
Left = 201
Top = 2
Width = 4
Height = 149
Cursor = crHSplit
OnMoved = Splitter1Moved
end
object DirectoryListBox1: TDirectoryListBox
Left = 2
Top = 2
Width = 199
Height = 149
Hint = 'Selected Path'
Align = alLeft
FileList = FileListBox1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 16
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnChange = DirectoryListBox1Change
end
object FileListBox1: TFileListBox
Left = 205
Top = 2
Width = 122
Height = 149
Hint = 'Matching Files'
Align = alClient
FileType = [ftHidden, ftSystem, ftArchive, ftNormal]
Font.Charset = DEFAULT_CHARSET
Font.Color = clBtnShadow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
end
object Edit1: TEdit
Left = 8
Top = 232
Width = 329
Height = 21
Hint = 'Selected Path'
ParentShowHint = False
ShowHint = True
TabOrder = 4
end
end